home *** CD-ROM | disk | FTP | other *** search
/ Dos/V Magazine 1995 September 1 / CD [VMAG950901].bin / theway / awa.dir / 00003.ls < prev    next >
Encoding:
Text File  |  1995-07-13  |  364 b   |  17 lines
  1. on exitFrame
  2.   global AorR, x, y
  3.   repeat while (the mouseCast < 53) and (the mouseCast > 46)
  4.     set x to the mouseCast
  5.     if x <> y then
  6.       set y to x
  7.       puppetSound("click")
  8.     end if
  9.     puppetSprite(1, 0)
  10.     puppetSprite(13, 0)
  11.     if (x < 53) and (x > 46) then
  12.       go(string(the name of cast x & AorR))
  13.     end if
  14.   end repeat
  15.   go(the frame)
  16. end
  17.